BBS Toolkit/BBS Toolkit.iso/doors_2/prodiz11.zip/PROUT1.BAT

DOS Batch File | 1992-01-03 | 2KB | 59 lines

@echo off
rem -- process a single upload file - for ProDOOR 3.4
rem -- %1-logfile, %2-testfile, %3-comport, %4-conference

rem -- determing file type and branch to proper test case
rem -- using 4DOS commands
if %@ext[%2] == gif goto gif
if %@ext[%2] == zip goto zip
if %@ext[%2] == exe goto exe
if %@ext[%2] == lzh goto zip
if %@ext[%2] == arj goto zip
goto end

:exe
proecho %3 EXE files are not allowed!  ZIP or GIF only!
mov %2 h:\hold
goto end

rem -- Check GIF, delete if invalid or incomplete GIF file and
rem -- add resolution to description
:gif
giftest %2 /E/A/P:%3/L/B:1/D/M:321x201x16/F:\prolon%pcbnode%\$door.nam
goto end

rem -- test ZIP files
rem -- ZipLab Plus tests ZIP, ARJ, and LZH files
:zip
SET PCBDOOR=PRODOOR
ptest %2 \prolon%pcbnode%\ptest.cfg
SET PCBDOOR=
if not exist %2 goto end

proecho %3 ~Searching for FILE_ID.DIZ...~
prodiz %2 \prolon%pcbnode%\$door.nam /D

rem proecho %3 ~Checking CRC for duplication...~
rem zdcsfc %2 UPLOAD
rem if exist pcbfail.txt sendcom %3 /F PCBFAIL.TXT
rem if exist pcbfail.txt del %2
rem if not exist %2 goto end

rem -- Check for AV in the file
proecho %3 ~~ChkAv 2.2 - Courtesy of The Bard's Lair [phone]~
proecho %3 ~Checking for -AV~
chkav %2
if errorlevel == 2 av
goto end

rem -- Found AV
:av
proecho %3 ~~Found -AV in file, sending mail to SysOp to revue file... ~
echo User has uploaded the file: %2 > mail
echo which contains an -AV in it, please revue file. >> mail
txt2msg f:\bbs\main\msgs -tSYSOP -fPROUTEST -sAV_File mail
del mail
goto end

:end